/ Chip: 2001 Haziran / CHIP Haziran2001.iso / prog / share / 17 / dings_e.exe / Projects / Samples / In_Out / File_IO.src

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 13 24 24 44 69 6e 67 73 | 5f 50 72 6f 6a 65 63 74 |.$$Dings|_Project|
|00000010| 46 69 6c 65 2e 00 00 00 | 46 72 61 6d 65 72 61 74 |File....|Framerat|
|00000020| 65 20 36 30 20 52 65 73 | 6f 6c 75 74 69 6f 6e 20 |e 60 Res|olution |
|00000030| 30 20 46 75 6c 6c 73 63 | 72 65 65 6e 20 30 20 44 |0 Fullsc|reen 0 D|
|00000040| 65 62 75 67 20 30 ff 93 | 02 2f 2f 20 2d 2d 2d 2d |ebug 0..|.// ----|
|00000050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000070| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000080| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 20 2f 2f 0d 0a 2f 2f |--------|- //..//|
|00000090| 20 44 61 74 65 69 20 5a | 75 67 72 69 66 66 20 2f | Datei Z|ugriff /|
|000000a0| 20 46 69 6c 65 20 41 63 | 63 65 73 73 0d 0a 2f 2f | File Ac|cess..//|
|000000b0| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -------|--------|
|000000c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 20 2f |--------|------ /|
|000000f0| 2f 0d 0a 20 0d 0a 46 4f | 52 20 69 3d 30 20 54 4f |/.. ..FO|R i=0 TO|
|00000100| 20 39 0d 0a 20 4c 45 54 | 20 6e 75 6d 3d 52 4e 44 | 9.. LET| num=RND|
|00000110| 28 31 30 30 30 29 20 20 | 20 20 20 20 20 20 20 20 |(1000)  |        |
|00000120| 20 20 20 20 20 2f 2f 20 | 5a 75 66 e4 6c 6c 69 67 |     // |Zuf.llig|
|00000130| 65 20 5a 61 68 6c 20 20 | 20 20 20 20 20 20 20 2f |e Zahl  |       /|
|00000140| 20 52 61 6e 64 6f 6d 20 | 6e 75 6d 62 65 72 0d 0a | Random |number..|
|00000150| 20 50 55 54 46 49 4c 45 | 20 22 54 65 73 74 46 69 | PUTFILE| "TestFi|
|00000160| 6c 65 2e 74 78 74 22 2c | 20 69 2c 20 6e 75 6d 20 |le.txt",| i, num |
|00000170| 20 2f 2f 20 49 6e 20 5a | 65 69 6c 65 20 3c 69 3e | // In Z|eile <i>|
|00000180| 20 73 63 68 72 65 69 62 | 65 6e 20 2f 20 57 72 69 | schreib|en / Wri|
|00000190| 74 65 20 74 6f 20 6c 69 | 6e 65 20 3c 69 3e 0d 0a |te to li|ne <i>..|
|000001a0| 4e 45 58 54 0d 0a 0d 0a | 6e 75 6d 3d 2d 31 0d 0a |NEXT....|num=-1..|
|000001b0| 0d 0a 50 55 54 46 49 4c | 45 20 22 54 65 73 74 2e |..PUTFIL|E "Test.|
|000001c0| 74 78 74 22 2c 20 35 2c | 20 35 0d 0a 0d 0a 0d 0a |txt", 5,| 5......|
|000001d0| 46 4f 52 20 69 3d 30 20 | 54 4f 20 39 0d 0a 20 47 |FOR i=0 |TO 9.. G|
|000001e0| 45 54 46 49 4c 45 20 22 | 54 65 73 74 46 69 6c 65 |ETFILE "|TestFile|
|000001f0| 2e 74 78 74 22 2c 20 69 | 2c 20 6e 75 6d 20 20 2f |.txt", i|, num  /|
|00000200| 2f 20 41 75 73 20 5a 65 | 69 6c 65 20 3c 69 3e 20 |/ Aus Ze|ile <i> |
|00000210| 6c 65 73 65 6e 20 20 20 | 20 2f 20 52 65 61 64 20 |lesen   | / Read |
|00000220| 66 72 6f 6d 20 6c 69 6e | 65 20 3c 69 3e 0d 0a 20 |from lin|e <i>.. |
|00000230| 50 52 49 4e 54 20 6e 75 | 6d 2c 20 30 2c 20 69 2a |PRINT nu|m, 0, i*|
|00000240| 32 30 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |20      |        |
|00000250| 2f 2f 20 41 75 73 67 61 | 62 65 20 61 6d 20 42 69 |// Ausga|be am Bi|
|00000260| 6c 64 73 63 68 69 72 6d | 20 20 2f 20 50 72 69 6e |ldschirm|  / Prin|
|00000270| 74 20 74 6f 20 73 63 72 | 65 65 6e 0d 0a 4e 45 58 |t to scr|een..NEX|
|00000280| 54 0d 0a 53 48 4f 57 53 | 43 52 45 45 4e 20 20 20 |T..SHOWS|CREEN   |
|00000290| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000002a0| 20 20 20 20 2f 2f 20 4e | 69 65 20 76 65 72 67 65 |    // N|ie verge|
|000002b0| 73 73 65 6e 21 20 20 20 | 20 20 20 20 20 20 2f 20 |ssen!   |      / |
|000002c0| 4e 65 76 65 72 20 66 6f | 72 67 65 74 20 74 68 69 |Never fo|rget thi|
|000002d0| 73 0d 0a 4d 4f 55 53 45 | 57 41 49 54             |s..MOUSE|WAIT    |
+--------+-------------------------+-------------------------+--------+--------+